home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 010 / blit.arc / MAIN.C < prev    next >
Encoding:
C/C++ Source or Header  |  1985-06-10  |  1.8 KB  |  68 lines
  1. /*
  2.  * NAME:         MAIN
  3.  *
  4.  * DESCRIPTION: MAIN LINE PROGRAM TO CALL THE LAYERS CODE TEST ROUTINE.
  5.  *
  6.  * SYNOPSIS:     MAIN(ARGC, ARGV)
  7.  *              INT     ARGC;
  8.  *              CHAR **ARGV;
  9.  *
  10.  * GLOBALS:      NONE.
  11.  *
  12.  * CALLS:        ATOI     (LIBC)
  13.  *              FREOPEN   (LIBC)
  14.  *              FPRINTF   (LIBC)
  15.  *              DONE      (JERQ.C)
  16.  *              USAGE     (JERQ.C)
  17.  *              LAYERS    (LAYERS.C)
  18.  *              TEST      (TEST.C)
  19.  *
  20.  * CALLED BY:    OPERATING SYSTEM.
  21.  */
  22. #INCLUDE <STDIO.H>
  23.  
  24. #INCLUDE "LAYERS.H"
  25.  
  26. MAIN (ARGC, ARGV)
  27. INT    ARGC;
  28. CHAR **ARGV;
  29. {
  30.    CHAR    *CP;
  31.    INT      PLTSIZ;
  32.    INT      TESTNO;
  33.  
  34.     PLTSIZ = 1;
  35.     TESTNO = 1;
  36.     FOR (; ARGC > 1; ARGC--) {
  37.         ARGV++;
  38.        IF (**ARGV == '-') {
  39.             SWITCH (*++*ARGV) {
  40.                CASE 'O':               /* DEFINE OUTPUT FILE */
  41.                    IF (ARGC >= 2) {
  42.                    /*
  43.                     * OPEN OUTPUT FILE
  44.                     */
  45.                        IF (FREOPEN (*++ARGV, "W", STDOUT) == NULL) {
  46.                             FPRINTF (STDERR, "JERQ: CANNOT OPEN %S\N", *ARGV);
  47.                            DONE (1);
  48.                        }
  49.                         ARGC--;
  50.                    }
  51.                    CONTINUE;
  52.                CASE 'S':               /* PLOT SIZE */
  53.                    PLTSIZ = ATOI (++*ARGV);
  54.                    CONTINUE;
  55.                CASE 'T':               /* TEST NO. */
  56.                    TESTNO = ATOI (++*ARGV);
  57.                    CONTINUE;
  58.                DEFAULT:
  59.                    FPRINTF (STDERR, "JERQ: UNKNOWN OPTION %S\N", *ARGV);
  60.                    USAGE ();
  61.                    CONTINUE;
  62.            }
  63.        }
  64.    }
  65.    TEST (TESTNO, PLTSIZ);              /* TEST THE "LAYERS" CODE */
  66.    DONE (0);
  67. }
  68.